CyberMycha Extra 2004 January/CyberMycha Extra 1-2004 (Poland) (Disc 2).bin/Pippi/common.cst/00039_autoEffectsOnce.ls

Text File | 2001-09-04 | 542 b | 33 lines

property meSprite, xDone, autoTix

on beginSprite me
  autoTix = the timer + random(1000)
  meSprite = sprite(me.spriteNum)
  meSprite.static = 1
  xDone = 0
end

on autoTrig me
  if xDone = 0 then
    xDone = 1
    if meSprite.playing = 0 then
      meSprite.static = 0
      meSprite.play()
    end if
  end if
end

on exitFrame me
  if xDone = 0 then
    if the timer > autoTix and the timer < autoTix + 10 then
      autoTrig me
    end if
  end if
end

on setStatic me
  if meSprite.playing = 0 then
    meSprite.static = 1
  end if
end